home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / System Software (8-bit) / Disk Images / ProDOS Users Disk / STARTUP.PRO.bas < prev    next >
Encoding:
BASIC Source File  |  1988-02-18  |  1.1 KB  |  25 lines
  1. 10  TEXT : HOME 
  2. 15 D$ =  CHR$(4)
  3. 16  PRINT D$;"PREFIX /PRO"
  4. 20  HTAB 13: PRINT "Selection Menu"
  5. 30  VTAB 5: PRINT "A..ProDOS"
  6. 40  VTAB 13: PRINT "E..AppleWorks"
  7. 50  VTAB 9: PRINT "C..MousePaint"
  8. 72  VTAB 11: PRINT "D..Dos 3.3"
  9. 74  VTAB 7: PRINT "B..Basic"
  10. 76  VTAB 15: PRINT "F..Applewriter //"
  11. 77  VTAB 5: HTAB 20: PRINT "G..Access //"
  12. 78  VTAB 7: HTAB 20: PRINT "Q..Quit"
  13. 80  VTAB 20: PRINT "Enter Choice From Menu ";
  14. 85  GET A$
  15. 90  IF A$ = "A"  OR A$ = "a"  THEN  PRINT D$;"-/PRO/UTILITIES/STARTUP"
  16. 100  IF A$ = "E"  OR A$ = "e"  THEN  PRINT D$;"-/PRO/APPLEWORKS/APLWORKS.SYSTEM
  17. 110  IF A$ = "C"  OR A$ = "c"  THEN  PRINT D$;"PREFIX /PRO/MOUSEPAINT": PRINT D$;"-START.INTRO"
  18. 130  IF A$ = "D"  OR A$ = "d"  THEN  PRINT D$;"PR#6"
  19. 140  IF A$ = "Q"  OR A$ = "q"  THEN  HOME : GOTO 165
  20. 150  IF A$ = "B"  OR A$ = "b"  THEN  HOME : NEW 
  21. 155  IF A$ = "F"  OR A$ = "f"  THEN  PRINT D$;"PREFIX /PRO/AW2": PRINT D$;"-AW.SYSTEM"
  22. 157  IF A$ = "G"  OR A$ = "g"  THEN  PRINT D$;"PREFIX/PRO/ACA": PRINT D$;"-LOADER.SYSTEM"
  23. 160  PRINT  CHR$(7): GOTO 10
  24. 165  VTAB 11: HTAB 8: PRINT "..Please Reboot System..": END 
  25. 1000  END